'/
' MOTEP - Massive Online Text Environment Project
' --------------------------------------------------------------------------------
' Shared Code
' 
' Character.bmx
' 
' (c) Anton Berlin. All Rights Reserved.
'/


type TCharacter extends TObject

	method Construct:byte() 
	
		if (super.Construct()) then
		
			m_descr = "Spelare"
			m_account = NULL_DATA
			m_charID = -1
			m_id = 0	'*** 0 = the id is not in the world database!
			return 1
		
		else
		
			return 0
		
		end if
	
	end method
	
	field m_charID:int
	field m_account:string
	field m_region:byte
	field m_level:int
	field m_race:int
	field m_class:int
	field m_gender:int

end type

function CreateCharacter:TCharacter()

	local char:TCharacter = new TCharacter
	char.Construct()
	return char

end function
